
<div class="navigue">


<script language="SpeedScript">



  /* PREPROCESSOR Definitions */

  

  DEF INPUT PARAMETER buf-noerr   AS    INTEGER            NO-UNDO.
  DEF INPUT PARAMETER a-lang      AS    INTEGER            NO-UNDO.

  

  DEF VAR lab-bouton AS   CHARACTER EXTENT 5               NO-UNDO.
  DEF VAR i          AS   INTEGER                          NO-UNDO.

  FIND erreur WHERE erreur.noerr = buf-noerr

                AND erreur.lang  = a-lang NO-LOCK NO-ERROR.

  DO i = 1 to NUM-ENTRIES(erreur.libel) BY 3:


</script>

  <input type="`ENTRY(i,erreur.libel)`" value="`ENTRY(i + 1,erreur.libel)`" 

<script language="SpeedScript">
     IF ENTRY(i + 2,erreur.libel) <> "" THEN 
        {&out} " " ENTRY(i + 2,erreur.libel).
     {&out} " " "name=~"navigue~" />".
  END.
</script>

</div>

